home *** CD-ROM | disk | FTP | other *** search
- /* */
- /* MODULE: DRVSPC2.C - MY C FUNCTION */
- /* */
- #include <dos.h>
-
- extern int pascal DRVNUM;
- extern long pascal RTNVAL; /* LEM return buffer */
-
- int cdecl errno; /* Global variable from start-up code */
- struct dfree dfvar;
- signed long parm1,parm2,parm3;
-
-
- unsigned pascal my_c_func(void)
- {
- getdfree(DRVNUM,&dfvar);
- if (dfvar.df_sclus == -1)
- {
- RTNVAL = -1;
- return(0);
- }
- parm1 = (signed long) dfvar.df_avail;
- parm2 = (signed long) dfvar.df_bsec;
- parm3 = (signed long) dfvar.df_sclus;
- RTNVAL = parm1 * parm2 * parm3;
- return(0);
- }